function show_hist(subp1, subp2, subp3, vector1, vector2)

subplot(subp1,subp2,subp3);
[h1 b1] = hist(vector1,16); 
[h2 b2] = hist(vector2,16);  
            mm1 = b1(end); mm2 = b2(end); mm = 0;
            if(mm1 > mm2) mm = mm1; else mm = mm2; end
            b1 = b1 / mm; b2 = b2 / mm;
            
            hold on;
            bar(b1, h1, 1, 'g');
            bar(b2, h2, 1, 'r'); 
            plot(b1,h1,'k', 'LineWidth', 2);
            plot(b2,h2,'b', 'LineWidth', 2);
            xlim([0 1]);
            grid;
             hold off; 
